object UMantenimientoPresupuestos: TUMantenimientoPresupuestos
  Left = 0
  Top = 0
  Align = alClient
  Caption = 'Mantenimiento de Presupuestos de Proveedores'
  ClientHeight = 742
  ClientWidth = 1347
  Color = clBtnFace
  OldCreateOrder = False
  WindowState = wsMaximized
  OnShow = UniFormShow
  MonitoredKeys.Keys = <>
  ExplicitWidth = 320
  ExplicitHeight = 240
  PixelsPerInch = 96
  TextHeight = 13
  object pgPresupuestos: TUniPageControl
    Left = 0
    Top = 0
    Width = 1347
    Height = 742
    ParentShowHint = False
    ActivePage = TabConsulta
    TabOrder = 0
    Align = alClient
    Anchors = [akLeft, akTop, akRight, akBottom]
    object TabConsulta: TUniTabSheet
      Caption = 'Consulta'
      ExplicitLeft = 0
      ExplicitTop = 0
      ExplicitWidth = 0
      ExplicitHeight = 0
      object pnlBuscar: TUniPanel
        Left = 0
        Top = 41
        Width = 1339
        Height = 168
        Align = alTop
        Anchors = [akLeft, akTop, akRight]
        Color = clBtnFace
        TabOrder = 0
        object cbxFechaEmision: TUniCheckBox
          Left = 32
          Top = 61
          Width = 136
          Height = 17
          Checked = False
          Caption = 'Fecha de emision:'
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
          TabOrder = 3
          OnClick = cbxFechaEmisionClick
        end
        object dbDesdeC: TUniDateTimePicker
          Left = 90
          Top = 84
          Width = 120
          Height = 21
          DateTime = 41043.000000000000000000
          DateFormat = 'dd/MM/yyyy'
          TimeFormat = 'HH:mm:ss'
          Kind = tUniDate
          FirstDayOfWeek = dowLocaleDefault
          TabOrder = 4
          ParentColor = False
          Color = clWhite
        end
        object dbHastaC: TUniDateTimePicker
          Left = 90
          Top = 127
          Width = 120
          Height = 21
          DateTime = 41043.000000000000000000
          DateFormat = 'dd/MM/yyyy'
          TimeFormat = 'HH:mm:ss'
          Kind = tUniDate
          FirstDayOfWeek = dowLocaleDefault
          TabOrder = 5
          ParentColor = False
          Color = clWhite
        end
        object lblDesde: TUniLabel
          Left = 32
          Top = 84
          Width = 44
          Height = 17
          Caption = 'Desde:'
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
          TabOrder = 19
        end
        object lblHasta: TUniLabel
          Left = 32
          Top = 131
          Width = 41
          Height = 17
          Caption = 'Hasta:'
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
          TabOrder = 20
        end
        object lblCodigoProveedorC: TUniLabel
          Left = 606
          Top = 19
          Width = 71
          Height = 17
          Caption = 'Proveedor:'
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
          TabOrder = 21
        end
        object dbCodigoP: TUniEdit
          Left = 685
          Top = 16
          Width = 85
          Height = 22
          PasswordChar = #0
          CharCase = ecNormal
          MaxLength = 0
          CharEOL = #0
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
          TabOrder = 6
          Color = clWindow
          OnExit = dbCodigoPExit
          OnKeyPress = dbCodigoPKeyPress
        end
        object btnBuscadorP: TUniButton
          Left = 777
          Top = 14
          Width = 25
          Height = 22
          Caption = '...'
          TabOrder = 7
          OnClick = btnBuscadorPClick
        end
        object dbNombreP: TUniEdit
          Left = 808
          Top = 16
          Width = 313
          Height = 22
          PasswordChar = #0
          CharCase = ecNormal
          MaxLength = 0
          CharEOL = #0
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
          TabOrder = 8
          Color = clWindow
          OnKeyPress = dbNombrePKeyPress
        end
        object dbCodigoC: TUniEdit
          Left = 686
          Top = 56
          Width = 85
          Height = 22
          PasswordChar = #0
          CharCase = ecNormal
          MaxLength = 0
          CharEOL = #0
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
          TabOrder = 9
          Color = clWindow
          OnKeyPress = dbCodigoCKeyPress
        end
        object btnBuscadorC: TUniButton
          Left = 777
          Top = 55
          Width = 25
          Height = 22
          Caption = '...'
          TabOrder = 10
          OnClick = btnBuscadorCClick
        end
        object dbNombreC: TUniEdit
          Left = 808
          Top = 55
          Width = 313
          Height = 22
          PasswordChar = #0
          CharCase = ecNormal
          MaxLength = 0
          CharEOL = #0
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
          TabOrder = 11
          Color = clWindow
          OnKeyPress = dbNombreCKeyPress
        end
        object lblCodigoCategoriaC: TUniLabel
          Left = 606
          Top = 60
          Width = 71
          Height = 17
          Caption = 'Categoria:'
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
          TabOrder = 22
        end
        object UniLabel1: TUniLabel
          Left = 606
          Top = 95
          Width = 53
          Height = 17
          Caption = 'Servicio:'
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
          TabOrder = 23
        end
        object dbCodigoS: TUniEdit
          Left = 685
          Top = 93
          Width = 85
          Height = 22
          PasswordChar = #0
          CharCase = ecNormal
          MaxLength = 0
          CharEOL = #0
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
          TabOrder = 12
          Color = clWindow
          OnKeyPress = dbCodigoCKeyPress
        end
        object btnBuscadorS: TUniButton
          Left = 777
          Top = 93
          Width = 25
          Height = 22
          Caption = '...'
          TabOrder = 13
          OnClick = btnBuscadorSClick
        end
        object dbNombreS: TUniEdit
          Left = 808
          Top = 93
          Width = 313
          Height = 22
          PasswordChar = #0
          CharCase = ecNormal
          MaxLength = 0
          CharEOL = #0
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
          TabOrder = 14
          Color = clWindow
          OnKeyPress = dbNombreCKeyPress
        end
        object UniLabel2: TUniLabel
          Left = 606
          Top = 135
          Width = 72
          Height = 17
          Caption = 'Campa'#241'a:'
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
          TabOrder = 24
        end
        object dbCodigoCamp: TUniEdit
          Left = 685
          Top = 133
          Width = 85
          Height = 22
          PasswordChar = #0
          CharCase = ecNormal
          MaxLength = 0
          CharEOL = #0
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
          TabOrder = 15
          Color = clWindow
          OnKeyPress = dbCodigoCKeyPress
        end
        object btnBuscadorCamp: TUniButton
          Left = 777
          Top = 133
          Width = 25
          Height = 22
          Caption = '...'
          TabOrder = 16
          OnClick = btnBuscadorSClick
        end
        object dbNombreCamp: TUniEdit
          Left = 808
          Top = 133
          Width = 313
          Height = 22
          PasswordChar = #0
          CharCase = ecNormal
          MaxLength = 0
          CharEOL = #0
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
          TabOrder = 17
          Color = clWindow
          OnKeyPress = dbNombreCKeyPress
        end
        object rgEstadoReg: TUniRadioGroup
          Left = 1154
          Top = 16
          Width = 154
          Height = 87
          Items.Strings = (
            'Activo'
            'Inactivo'
            'Ambos')
          ItemIndex = 0
          Caption = 'Estado del Registro'
          TabOrder = 18
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
        end
        object lblBusqPresupuesto: TUniLabel
          Left = 32
          Top = 21
          Width = 81
          Height = 17
          Caption = 'Presupuesto:'
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
          TabOrder = 25
        end
        object dbCodPresupBusqueda: TUniEdit
          Left = 119
          Top = 21
          Width = 81
          Height = 22
          PasswordChar = #0
          CharCase = ecNormal
          MaxLength = 0
          CharEOL = #0
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
          TabOrder = 1
          Color = clWindow
        end
        object btnBuscadorPresup: TUniButton
          Left = 200
          Top = 21
          Width = 25
          Height = 22
          Caption = '...'
          TabOrder = 26
          OnClick = btnBuscadorPresupClick
        end
        object dbNombrePresupBusqueda: TUniEdit
          Left = 221
          Top = 21
          Width = 347
          Height = 22
          PasswordChar = #0
          CharCase = ecUpperCase
          MaxLength = 0
          CharEOL = #0
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
          TabOrder = 2
          Color = clInfoBk
          ReadOnly = True
        end
      end
      object dbgConsultaPresupuestos: TUniDBGrid
        Left = 0
        Top = 209
        Width = 1154
        Height = 505
        DataSource = dsPresupuesto
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack]
        ReadOnly = True
        WebOptions.LoadMaskMsg = 'Please wait...'
        OnDrawColumnCell = dbgConsultaPresupuestosDrawColumnCell
        OnDblClick = dbgConsultaPresupuestosDblClick
        StripeRows = False
        Align = alClient
        Anchors = [akLeft, akTop, akRight, akBottom]
        TabOrder = 1
        Columns = <
          item
            FieldName = 'DESCRIPCION_PRESUP'
            Title.Caption = 'NOMBRE DEL PRESUPUESTO'
            Title.Font.Style = [fsBold]
            Width = 500
            Visible = True
            Expanded = False
          end
          item
            FieldName = 'DESC_PROVEEDORES'
            Title.Caption = 'NOMBRE DEL PROVEEDOR'
            Title.Font.Style = [fsBold]
            Width = 250
            Visible = True
            Expanded = False
          end
          item
            FieldName = 'FECHA_VENCIMIENTO'
            Title.Alignment = taCenter
            Title.Caption = 'VENCIMIENTO'
            Title.Font.Style = [fsBold]
            Width = 134
            Visible = True
            Alignment = taCenter
            Expanded = False
          end>
      end
      object pnlTitulo: TUniPanel
        Left = 0
        Top = 0
        Width = 1339
        Height = 41
        Align = alTop
        Anchors = [akLeft, akTop, akRight]
        Color = clBtnFace
        TabOrder = 2
        object lblTitulo: TUniLabel
          Left = 1
          Top = 1
          Width = 1337
          Height = 39
          Alignment = taCenter
          AutoSize = False
          Caption = 'Consulta de Presupuestos de Proveedores'
          Align = alClient
          Anchors = [akLeft, akTop, akRight, akBottom]
          ParentFont = False
          Font.Color = clNavy
          Font.Height = -20
          Font.Name = 'Century Gothic'
          Font.Style = [fsBold]
          ParentColor = False
          Color = clSkyBlue
          Transparent = False
          TabOrder = 1
        end
      end
      object pnlBotonesProv: TUniPanel
        Left = 1154
        Top = 209
        Width = 185
        Height = 505
        BorderStyle = ubsNone
        Align = alRight
        Anchors = [akTop, akRight, akBottom]
        Color = clBtnFace
        TabOrder = 3
        object btnNuevoPresup: TUniBitBtn
          Left = 16
          Top = 77
          Width = 153
          Height = 55
          ParentShowHint = False
          Glyph.Data = {
            76060000424D7606000000000000360400002800000018000000180000000100
            08000000000040020000230B0000230B000000010000000100002184290031A5
            4A0031AD520039B5520063A563006BAD840094DE8C00A5E79C00FF00FF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00080808080808
            0808080808080808080808080808080808080808080808080808080808080808
            0808080808080808080808080808080808080808000000000808080808080808
            0808080808080808080808040506030100080808080808080808080808080808
            0808080407060302000808080808080808080808080808080808080407060302
            0008080808080808080808080808080808080804070603020008080808080808
            0808080808080808080808040706030200080808080808080808080808080808
            0808080407060302000808080808080808080808080000000000000007060302
            0000000000000000080808080401020202020202020203020202020202020201
            0008080804030303030303030303030303030303030303030008080804060606
            0606060606060303060606060606060600080808040507070707070707060302
            0707070707070705000808080804040404040404070603020000000000000000
            0808080808080808080808040706030200080808080808080808080808080808
            0808080407060302000808080808080808080808080808080808080407060302
            0008080808080808080808080808080808080804070603020008080808080808
            0808080808080808080808040706030200080808080808080808080808080808
            0808080407060302000808080808080808080808080808080808080405060301
            0008080808080808080808080808080808080808040404040808080808080808
            0808080808080808080808080808080808080808080808080808}
          Caption = '&Nuevo'
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
          TabOrder = 1
          OnClick = btnNuevoPresupClick
        end
        object btnEditarPresup: TUniBitBtn
          Left = 16
          Top = 138
          Width = 153
          Height = 55
          Glyph.Data = {
            E2030000424DE203000000000000A20100002800000018000000180000000100
            08000000000040020000520B0000520B00005B0000005B000000191919002125
            27000B3B54003E39350037454600384850003A5C600062555D00C75C0C007041
            38006B5D6200745D650098605800986060007E694C00986A5800A16A58008C79
            6000EA8F3800FFA13800E0985000F69E4B00F4AB500000008200010A9700000F
            9500165E820003478900000BB6000320BA000616CA000650FF0098586A009860
            6A00A1606A00FF00FF001684EA002A73D4005270FC0031ABFF0084848400A16A
            6A00A66B6B00AB6A6A00AB6A7300AC9D8A00B6737300C07B7300CA847B00B292
            6800D48F7300D48F7B00E0A16A00C0988F00EAB67300F7AF6C00EAC07B00EAC0
            8400FABB7D00D4B6AB00EAC08F00F4CA8F00F4CA9800FAC69300E0C0AB00EACA
            AB00F4CAA100F4D4A100F4D4AB00D4D4D400E0C0B600EAC0B600EAD4B600E0CA
            C000E0D4C000F4D4B600F4D4C000E0CACA00EAD4CA00F4E0B600F4E0C000F4E0
            CA00F4E0D400F4EAD400F4EAE000F4EAEA00FFF4EA00FFF4F400FFFFF400FFFF
            FF00000000002323230D29292929292929292929292929292929292923232323
            2320484F4443423E3D3939383838383838383829232323232320484F4B44423E
            3E3C393938383838383838292323232323204C504B4B44423E3E3C3939383838
            383838292323232323205051504B4444423E3E3C393938383838382923232323
            232051452828282800031131282828282828382923232323232152535150504B
            030104050E313939383838292323232323225454535150502D062502090E3139
            3938382923232323232954452828282828061A0B08090E312828382923232323
            232B555654545351505007371508090E3139382923232323232C575856545453
            51500A3A371508090E31392923232323232E5745282828282828280C3F371508
            090E312923232323232E575959575654545351500C3F371508090E2923232323
            232E57595959575654545351500C3F371508092923232323232F574528282828
            2828282828280C3A2A24271B23232323232F575959595959575654545351500C
            24272419172323232330575959595959595756545353534A27241D1E181C2323
            233057452828282828282828284E100F0C1C261F1C2323232333575959595959
            595958575646103414121C1C2323232323335759595959595959595958461036
            1613292323232323233357595959595959595959594910361629232323232323
            233359595959595959595959594D103629232323232323232332404141474040
            40403B3B3B351029232323232323232323232323232323232323232323232323
            232323232323}
          Caption = '&Modificar'
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
          TabOrder = 2
          OnClick = btnEditarPresupClick
        end
        object btnEliminarPresup: TUniBitBtn
          Left = 16
          Top = 200
          Width = 153
          Height = 53
          Glyph.Data = {
            76060000424D7606000000000000360400002800000018000000180000000100
            08000000000040020000220B0000220B000000010000000100000031DE00FF00
            FF000031FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00010101010101
            0101010101010101010101010101010101010101010101010101010101010101
            0101010101010100000101010101010101010101010101010101010101010000
            0001010100000001010101010101010101010101010000000101010100000000
            0101010101010101010101000000000101010101000000000001010101010101
            0101000000000101010101010100000000000101010101010100000000010101
            0101010101010200000000010101010100000000010101010101010101010101
            0000000001010000000000010101010101010101010101010100000000000000
            0000010101010101010101010101010101010000020002000001010101010101
            0101010101010101010101000000020001010101010101010101010101010101
            0101000002000002020101010101010101010101010101010100000200020202
            0002010101010101010101010101010102020200020101020202020101010101
            0101010101010102020002020101010102020202010101010101010101010202
            0202020101010101010102020201010101010101010202020202010101010101
            0101010202020101010101010202020202010101010101010101010101020101
            0101010202020202010101010101010101010101010101010101010202020201
            0101010101010101010101010101010101010102020201010101010101010101
            0101010101010101010101010101010101010101010101010101010101010101
            0101010101010101010101010101010101010101010101010101}
          Caption = '&Dar de baja'
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
          TabOrder = 3
          OnClick = btnEliminarPresupClick
        end
        object btnCancelar: TUniBitBtn
          Left = 16
          Top = 259
          Width = 153
          Height = 51
          Glyph.Data = {
            76060000424D7606000000000000360400002800000018000000180000000100
            08000000000040020000220B0000220B00000001000000010000942900009C31
            00009C390000A5390000A5420000AD420000AD4A0000B54A0000B5520000BD52
            0000BD5A0000C65A0000C6630000CE630000CE6B0000D66B0000D67300009C39
            0800A5390800A5420800AD420800AD4A0800B5520800BD5A0800CE630800AD4A
            1000B5521000B55A1000BD5A1000C6631000DE7B1000BD5A1800BD631800C663
            1800CE731800D6731800DE7B1800DE841800C6632100C66B2100D67B2100DE84
            2100EF942100D6842900E78C2900EF942900DE8C3100EF943100F79C3100F7A5
            3100E7943900F7A53900FFA53900F7A54200FFAD4200FFB54200F7AD4A00FFAD
            4A00FFB54A00FFB55200FFBD5200FFC65200FF00FF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF003E3E3E3E3E3E
            3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E
            1313133E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E13080A13113E3E3E3E
            3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E120A0F0A13133E3E3E3E3E3E3E3E3E3E3E
            3E3E3E3E3E3E3E13130B0F0A13133E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E
            11130C0E0811113E3E3E131111111111111111111111133E3E11150D0E151111
            3E3E131B1B16151515151515071513133E3E11150E0C13113E3E192F2C1E0E0E
            0E0E0E0E0E0F16113E3E3E11160E0A11113E1935332C25180808080808161313
            3E3E3E3E110A0E15113E193839322F24131111111111133E3E3E3E3E11150E0A
            111119353B272E302313113E3E3E3E3E3E3E3E3E3E130D0C131119353C1F1935
            332212113E3E3E3E3E3E3E3E3E130C0C131119353C20002038332213113E3E3E
            3E3E3E3E3E130C0C131119353B2002022739332813113E3E3E3E3E3E11150E0C
            131119353B20023E022638362915113E3E3E3E13110A0E0A113E19353B20023E
            3E011F35362C1A1111111111080E0E14113E19353B20023E3E3E021932363022
            1B15150A0E0E16113E3E19383C20023E3E3E3E02112732302D1E100E0B15113E
            3E3E132B3219113E3E3E3E3E1102131B2120161313113E3E3E3E3E1111113E3E
            3E3E3E3E3E3E1111111111113E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E
            3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E
            3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E}
          Caption = '&Cancelar'
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
          TabOrder = 4
          OnClick = btnCancelarClick
        end
        object btnBuscarP: TUniBitBtn
          Left = 16
          Top = 16
          Width = 153
          Height = 55
          Glyph.Data = {
            76060000424D7606000000000000360400002800000018000000180000000100
            08000000000040020000320B0000320B000000010000000100005A5A5A005263
            6B00846B6B009C6B6B00636B7300A5737300A57B73007B7B7B00AD847B00AD8C
            8400B58C8400EFBD8400BD8C8C00C6948C00BD9C8C00C69C8C00F7BD8C00F7C6
            8C00738494007B84940084849400C6949400C69C9400CE9C9400D69C9400BDA5
            9400CEA59400CEAD9400F7C69400F7CE94009C9C9C00BD9C9C00CE9C9C00D69C
            9C00CEA59C00F7CE9C00F7D69C003973A500C6A5A500ADADA500D6ADA500D6B5
            A500D6BDA500F7D6A500C6ADAD00D6B5AD00D6C6AD00DEC6AD00E7C6AD00E7CE
            AD00F7D6AD00F7DEAD00FFDEAD001873B5002173B5006394B500E7CEB500EFD6
            B500EFDEB500F7DEB500FFE7B5001873BD00E7D6BD00F7DEBD00F7E7BD00FFE7
            BD00FFEFBD00FFF7BD00EFDEC600EFE7C600FFEFC600FFF7C600FFF7CE003184
            D600FFFFD600C6CEDE00F7EFDE00FFEFDE00FFFFDE00EFEFE700FFF7E700FFFF
            E700218CEF00F7F7EF00FFFFEF00FFFFF700FF00FF0031A5FF0039A5FF0042A5
            FF004AB5FF0052BDFF005ABDFF007BC6FF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
            FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00560004165656
            5656565656565656565656565656565656562725361217565656565656565656
            5656565656565656565637585236131756565656565656565656565656565656
            56565A5C59523613175656565656565656565656565656565656575B5C595236
            13175656565656565656565656565656565656575B5C59523614175656565656
            565656565656565656565656575B5C5952361417565656565656565656565656
            5656565656575B5C59523614565656565656565656565656565656565656575B
            5C5849015656030A222928201556565656565656565656575B5D4B1E02093E48
            4A4E4A4A44225656565656565656565656564F2C1A484A4E4A4A4A4E4E4E2905
            565656565656565656562C1A4241484A4A4A4E4E515E5E265656565656565656
            56560C3A3C32484A4A4E5154555E5E4C065656565656565656562942232B484A
            4A4E54555E55544E1956565656565656561531421123464A4A4E545555544E4E
            2E155656565656565615393C0B113B4A4A4E515454514E4E3E0E565656565656
            56153942100B23464A4E4E4E4E4E4A4E3E0E56565656565656153142230B1C2B
            464A4E4A4A4A4A4E2E1556565656565656562842413323232B40484A4A4A4A4A
            0E5656565656565656560C3A4E544C231D1C324040464A440556565656565656
            5656560F505E5E3F1C0B101C3242460E5656565656565656565656561F4F5448
            3C33333C4240165656565656565656565656565656062A404242424030155656
            565656565656565656565656565656080F222216565656565656}
          Caption = '&Buscar'
          ParentFont = False
          Font.Height = -13
          Font.Name = 'Century Gothic'
          TabOrder = 5
          OnClick = btnBuscarPClick
        end
      end
    end
    object TabMantenimiento: TUniTabSheet
      Caption = 'Mantenimiento'
      ExplicitLeft = 0
      ExplicitTop = 0
      ExplicitWidth = 0
      ExplicitHeight = 0
      object pnlGeneral: TUniPanel
        Left = 0
        Top = 0
        Width = 1339
        Height = 714
        Align = alClient
        Anchors = [akLeft, akTop, akRight, akBottom]
        Color = clBtnFace
        TabOrder = 0
        object pnlCargaDatosPresup: TUniPanel
          Left = 1
          Top = 40
          Width = 1337
          Height = 479
          Align = alTop
          Anchors = [akLeft, akTop, akRight]
          Color = clBtnFace
          TabOrder = 1
          ExplicitWidth = 0
          object lblNombrePresupuesto: TUniLabel
            Left = 120
            Top = 229
            Width = 91
            Height = 16
            Caption = 'Descripci'#243'n: *'
            ParentFont = False
            Font.Height = -13
            Font.Name = 'Century Gothic'
            Font.Style = [fsBold]
            TabOrder = 8
          end
          object lblDatosGenerales: TUniLabel
            Left = 133
            Top = 14
            Width = 124
            Height = 16
            Caption = 'DATOS GENERALES:'
            ParentFont = False
            Font.Charset = ANSI_CHARSET
            Font.Color = clBlack
            Font.Height = -13
            Font.Name = 'Century Gothic'
            Font.Style = [fsBold]
            TabOrder = 11
          end
          object btnBuscadorMP: TUniButton
            Left = 542
            Top = 113
            Width = 25
            Height = 22
            Caption = '...'
            TabOrder = 12
            OnClick = btnBuscadorMPClick
          end
          object dbNombreProv: TUniEdit
            Left = 282
            Top = 115
            Width = 254
            Height = 22
            PasswordChar = #0
            CharCase = ecNormal
            MaxLength = 0
            CharEOL = #0
            ParentFont = False
            Font.Height = -13
            Font.Name = 'Century Gothic'
            TabOrder = 1
            Color = clWindow
            OnKeyPress = dbNombreProvKeyPress
          end
          object lblFechaEmision: TUniLabel
            Left = 645
            Top = 82
            Width = 118
            Height = 16
            Caption = 'Fecha de emisi'#243'n:'
            ParentFont = False
            Font.Height = -13
            Font.Name = 'Century Gothic'
            Font.Style = [fsBold]
            TabOrder = 13
          end
          object lblFechaVencimiento: TUniLabel
            Left = 644
            Top = 118
            Width = 157
            Height = 16
            Caption = 'Fecha de vencimiento: *'
            ParentFont = False
            Font.Height = -13
            Font.Name = 'Century Gothic'
            Font.Style = [fsBold]
            TabOrder = 14
          end
          object lblDatosProv: TUniLabel
            Left = 119
            Top = 115
            Width = 79
            Height = 16
            Caption = 'Proveedor: *'
            ParentFont = False
            Font.Height = -13
            Font.Name = 'Century Gothic'
            Font.Style = [fsBold]
            TabOrder = 15
          end
          object lblTotalSinIvaGral: TUniLabel
            Left = 644
            Top = 195
            Width = 102
            Height = 16
            Caption = 'COSTO TOTAL: *'
            ParentFont = False
            Font.Height = -13
            Font.Name = 'Century Gothic'
            Font.Style = [fsBold]
            TabOrder = 16
          end
          object lblIVAGral: TUniLabel
            Left = 644
            Top = 229
            Width = 66
            Height = 16
            Caption = 'IVA (10%):'
            ParentFont = False
            Font.Height = -13
            Font.Name = 'Century Gothic'
            Font.Style = [fsBold]
            TabOrder = 17
          end
          object dbCostoTotalPresup: TUniDBEdit
            Left = 832
            Top = 195
            Width = 177
            Height = 22
            DataField = 'COSTO'
            DataSource = dsMantePresupG
            PasswordChar = #0
            CharCase = ecUpperCase
            MaxLength = 0
            CharEOL = #0
            ParentFont = False
            Font.Name = 'Century Gothic'
            TabOrder = 10
            Color = clWindow
            OnKeyPress = dbCostoTotalKeyPress
          end
          object dbIVAGral: TUniDBEdit
            Left = 831
            Top = 229
            Width = 177
            Height = 22
            DataField = 'IVA'
            DataSource = dsMantePresupG
            PasswordChar = #0
            CharCase = ecUpperCase
            MaxLength = 0
            CharEOL = #0
            ParentFont = False
            Font.Name = 'Century Gothic'
            TabOrder = 9
            Color = clWindow
            OnClick = dbIVAGralClick
            OnKeyPress = dbCostoTotalKeyPress
          end
          object lblCategoria: TUniLabel
            Left = 120
            Top = 153
            Width = 79
            Height = 16
            Caption = 'Categor'#237'a: *'
            ParentFont = False
            Font.Height = -13
            Font.Name = 'Century Gothic'
            Font.Style = [fsBold]
            TabOrder = 18
          end
          object btnBuscadorMCat: TUniButton
            Left = 542
            Top = 151
            Width = 25
            Height = 22
            Caption = '...'
            TabOrder = 19
            OnClick = btnBusqCategoriaClick
          end
          object dbNombreCategoria: TUniEdit
            Left = 282
            Top = 153
            Width = 254
            Height = 22
            PasswordChar = #0
            CharCase = ecNormal
            MaxLength = 0
            CharEOL = #0
            TabOrder = 2
            Color = clWindow
          end
          object dbNombreServicio: TUniEdit
            Left = 282
            Top = 191
            Width = 254
            Height = 22
            PasswordChar = #0
            CharCase = ecNormal
            MaxLength = 0
            CharEOL = #0
            TabOrder = 3
            Color = clWindow
          end
          object btnBuscadorMServ: TUniButton
            Left = 542
            Top = 189
            Width = 25
            Height = 22
            Caption = '...'
            TabOrder = 20
            OnClick = btnBusqServicioClick
          end
          object lblServicio: TUniLabel
            Left = 120
            Top = 194
            Width = 65
            Height = 16
            Caption = 'Servicio: *'
            ParentFont = False
            Font.Height = -13
            Font.Name = 'Century Gothic'
            Font.Style = [fsBold]
            TabOrder = 21
          end
          object dbFechaE: TUniDateTimePicker
            Left = 832
            Top = 81
            Width = 89
            Height = 21
            DateTime = 41067.000000000000000000
            DateFormat = 'dd/MM/yyyy'
            TimeFormat = 'HH:mm:ss'
            Kind = tUniDate
            FirstDayOfWeek = dowLocaleDefault
            TabOrder = 5
            ParentFont = False
            Font.Name = 'Century Gothic'
            ParentColor = False
            Color = clWhite
          end
          object dbFechaVenc: TUniDateTimePicker
            Left = 832
            Top = 118
            Width = 88
            Height = 21
            DateTime = 41067.000000000000000000
            DateFormat = 'dd/MM/yyyy'
            TimeFormat = 'HH:mm:ss'
            Kind = tUniDate
            FirstDayOfWeek = dowLocaleDefault
            TabOrder = 6
            ParentFont = False
            Font.Name = 'Century Gothic'
            ParentColor = False
            Color = clWhite
          end
          object dbNombreCampanha: TUniEdit
            Left = 282
            Top = 75
            Width = 254
            Height = 22
            PasswordChar = #0
            CharCase = ecNormal
            MaxLength = 0
            CharEOL = #0
            ParentFont = False
            Font.Height = -13
            Font.Name = 'Century Gothic'
            TabOrder = 4
            Color = clWindow
          end
          object btnBuscadorMCamp: TUniButton
            Left = 542
            Top = 75
            Width = 25
            Height = 22
            Caption = '...'
            TabOrder = 22
            OnClick = btnBuscadorMCampClick
          end
          object UniLabel17: TUniLabel
            Left = 120
            Top = 81
            Width = 80
            Height = 16
            Caption = 'Campa'#241'a: *'
            ParentFont = False
            Font.Height = -13
            Font.Name = 'Century Gothic'
            Font.Style = [fsBold]
            TabOrder = 23
          end
          object UniLabel5: TUniLabel
            Left = 133
            Top = 36
            Width = 104
            Height = 16
            Caption = 'Datos obligatorios *'
            ParentFont = False
            Font.Name = 'Century Gothic'
            TabOrder = 24
          end
          object lblCantHabitaciones: TUniLabel
            Left = 644
            Top = 156
            Width = 169
            Height = 16
            Caption = 'Habitaciones Disponibles:'
            ParentFont = False
            Font.Height = -13
            Font.Name = 'Century Gothic'
            Font.Style = [fsBold]
            TabOrder = 25
          end
          object dbCantHabitac: TUniDBEdit
            Left = 832
            Top = 156
            Width = 177
            Height = 22
            DataField = 'HABITACIONES_DISP'
            DataSource = dsMantePresupG
            PasswordChar = #0
            CharCase = ecUpperCase
            MaxLength = 0
            CharEOL = #0
            ParentFont = False
            Font.Name = 'Century Gothic'
            TabOrder = 7
            Color = clWindow
            OnKeyPress = dbCodigoPresupKeyPress
          end
          object dbDescripcion: TUniDBEdit
            Left = 282
            Top = 229
            Width = 254
            Height = 22
            DataField = 'DESCRIPCION_PRESUP'
            DataSource = dsMantePresupG
            PasswordChar = #0
            CharCase = ecUpperCase
            MaxLength = 0
            CharEOL = #0
            ParentFont = False
            Font.Name = 'Century Gothic'
            TabOrder = 26
            Color = clWindow
            OnKeyPress = dbDescripcionKeyPress
          end
          object dbCodCampanha: TUniEdit
            Left = 575
            Top = 75
            Width = 30
            Height = 22
            PasswordChar = #0
            CharCase = ecNormal
            MaxLength = 0
            CharEOL = #0
            ParentFont = False
            Font.Height = -13
            Font.Name = 'Century Gothic'
            TabOrder = 27
            Color = clWindow
          end
          object dbCodProveedor: TUniEdit
            Left = 573
            Top = 115
            Width = 30
            Height = 22
            PasswordChar = #0
            CharCase = ecNormal
            MaxLength = 0
            CharEOL = #0
            ParentFont = False
            Font.Height = -13
            Font.Name = 'Century Gothic'
            TabOrder = 28
            Color = clWindow
          end
          object dbCodCategoria: TUniEdit
            Left = 573
            Top = 152
            Width = 30
            Height = 22
            PasswordChar = #0
            CharCase = ecNormal
            MaxLength = 0
            CharEOL = #0
            ParentFont = False
            Font.Height = -13
            Font.Name = 'Century Gothic'
            TabOrder = 29
            Color = clWindow
          end
          object dbCodServicio: TUniEdit
            Left = 573
            Top = 189
            Width = 30
            Height = 22
            PasswordChar = #0
            CharCase = ecNormal
            MaxLength = 0
            CharEOL = #0
            ParentFont = False
            Font.Height = -13
            Font.Name = 'Century Gothic'
            TabOrder = 30
            Color = clWindow
          end
        end
        object UniPanel1: TUniPanel
          Left = 1
          Top = 519
          Width = 1337
          Height = 57
          Align = alTop
          Anchors = [akLeft, akTop, akRight]
          Color = clBtnFace
          TabOrder = 2
          object btnGuardarPresup: TUniBitBtn
            Left = 488
            Top = 12
            Width = 129
            Height = 33
            Glyph.Data = {
              F6060000424DF606000000000000360000002800000018000000180000000100
              180000000000C0060000120B0000120B00000000000000000000FF00FFFF00FF
              995951883838823435843535812E2F8C5859A4A5A5A5A3A3A6A4A4A7A5A4A7A4
              A4A6A4A4A5A3A3A4A3A3A5A5A58E5656802D2D813132813233823435823435FF
              00FFFF00FFA0675BB25350BA4949BA4949BC4A4AA43D3D824E4F9C9D9DBFBFBC
              DDDAD8EEEAE7F7F2EEF7F2EDE9E5E3DAD9D7D4D5D5A35B5B7D1818801F1F8723
              23B04141AF4546823334FF00FFA0675BB25350BF4A4ABF4B4BC04C4CA73E3F83
              51518A7474A16766C19A97D5BDBBF7F2EDFFFBF7FAF4F2EAE7E5E1E2E1A65B5C
              7B1716801E1E872323B14141B14747823334FF00FFA0675BB25350BD4A4ABC4B
              4BC04C4CA53E3E8756568A6364872625A05553BA8986E6E1DDFAF4F2FEF8F4F7
              F2EEEBEBEAA95E5D7B1717801E1E872323B14141B14747823334FF00FFA0675B
              B25350BD4A4ABC4B4BC04C4CA53E3E8B5959916A6A7F1B1B882828A15A58D4CC
              CBEEEAE7FAF4F2FEFAF6F8F8F4AC62627B1617801E1E872323B14141B1474782
              3334FF00FFA0675BB25350BD4A4ABC4B4BC04C4CA53E3E8F5B5B986F6E801D1D
              7F1B1B892F2FBAB1B0DDDAD8EFEBE7FCF7F3FFFFFCB165647A1616801E1E8723
              23B14141B14747823334FF00FFA0675BB25350BD4A4ABC4B4BC04C4CA43D3D96
              5F5EA173727F18187F18187F1D1D989090C1C1C0DEDAD7F3EFEBFFFFFCB46866
              7A1616801E1E872323B14141B14747823334FF00FFA0675BB25350BD4A4ABC4B
              4BC04C4CA13C3C996260B59592904A4A8A4545864949878888A0A6A5C6CAC7E6
              EAE6FFFFFFB268677714147D1C1C842121B04141B14747823334FF00FFA0675B
              B25350BD4A4ABC4B4BC04C4CAB4141A65657C6918FBA8989AD8181A57B7B9D74
              749D7474B28887CC9E9DDEB1AFB55C5B912828952D2D993030B64545B1464782
              3334FF00FFA0675BB25350BF4B4BBF4B4BBF4B4BBD4A4ABD4848BC4646BC4747
              BC4747BD4647BD4647BC4646BB4444BB4444BA4444BC4747BD4A4ABD4848BF4B
              4BC04C4CAF4546823334FF00FFA0675BB25350B64545B04241B44846B85150BC
              5757BF5C5BBF5C5BBF5C5BBF5C5BBF5C5BBF5C5BBF5C5BBF5C5BBF5C5BBF5C5B
              BF5C5BBF5E5DBF5454BF4B4BAF4546823334FF00FFA0685BB454519C35318F30
              2CA1514DB47673C29693CBAAA9CCADACCCACABCCACABCCACABCCACABCCACABCC
              ACABCCACABCCACABCCACABCCB2B1C47777BD4646AF4546823334FF00FFA0685B
              B45350972D29C08782F8F2EFF3E7E6F4EAE9F6EDEBF6EDEBF6EDEBF6EDEBF6ED
              EBF6EDEBF6EDEBF6EDEBF6EDEBF6EDEBF8EFEEE9DDDCBF7574B23F3FAF454682
              3435FF00FFA0685BB45350972D29C5908CFFFFFFFAF2F0FAF2F0FAF2F0FAF2F0
              FAF2F0FAF2F0FAF2F0FAF2F0FAF2F0FAF2F0FAF2F0FAF2F0FCF4F3EAE0DEBD74
              73B03D3DAF4546823435FF00FFA0685BB45350972D29C48E8AFFFFFCF6EEEDF6
              EDEBF6EEEDF6EEEDF6EEEDF6EEEDF6EEEDF6EEEDF6EEEDF6EEEDF6EEEDF6EDEB
              FAF2F0EADEDDBD7473B03D3DAF4546823435FF00FFA0685BB45350972D29C48E
              8AFFFFFEE2DCDABDBBBBBFBDBDBFBDBDBFBDBDBFBDBDBFBDBDBFBDBDBFBDBDBF
              BDBDBFBDBDBBBAB8DED9D9EEE1E0BD7473B03D3DAF4546823435FF00FFA0685B
              B45350972D29C48E8AFFFFFEF2E9E9E7E1E0E7E1E0E7E1E0E7E1E0E7E1E0E7E1
              E0E7E1E0E7E1E0E7E1E0E7E1E0E6E0DEF2EBEBEDE0DEBD7473B03D3DAF454682
              3435FF00FFA0685BB45350972D29C48E8AFFFFFEE6E0DEC7C4C4C9C5C5C9C5C5
              C9C5C5C9C5C5C9C5C5C9C5C5C9C5C5C9C5C5C9C5C5C5C2C2E2DDDDEDE1E0BD74
              73B03D3DAF4546823435FF00FFA0685BB45350972D29C48E8AFFFFFEEEE6E5DD
              D7D5DDD8D7DDD8D7DDD8D7DDD8D7DDD8D7DDD8D7DDD8D7DDD8D7DDD8D7DCD5D5
              EEE7E6EDE0DEBD7473B03D3DAF4546823435FF00FFA0685BB45350972D29C48E
              8AFFFFFEEEE6E5DDD7D5DDD8D7DDD8D7DDD8D7DDD8D7DDD8D7DDD8D7DDD8D7DD
              D8D7DDD8D7DCD5D5EEE7E6EDE0DEBD7473B03D3DAF4546823435FF00FFA0685B
              B45350972D29C48E8AFFFFFEE5DDDDC5C1C1C6C4C2C6C4C2C6C4C2C6C4C2C6C4
              C2C6C4C2C6C4C2C6C4C2C6C4C2C2C0C0E2DCDAEEE1E0BD7473B03D3DAF454682
              3435FF00FFA0685BB45350972D29C58F8BFFFFFFFBF2F0FCF3F2FCF3F2FCF3F2
              FCF3F2FCF3F2FCF3F2FCF3F2FCF3F2FCF3F2FCF3F2FCF3F2FFF6F4EDE0DEBD74
              73B23F3FB04647823435FF00FFA0685BAD5450952D29BC8783EFEFEEEAE2E1EA
              E2E1EAE2E1EAE2E1EAE2E1EAE2E1EAE2E1EAE2E1EAE2E1EAE2E1EAE2E1EAE2E1
              EBE6E5E1D7D5B87270A53939A54142823435FF00FFFF00FF9858518A2D28A36F
              6DB6BCBCB4B2B2B4B2B2B4B2B2B4B2B2B4B2B2B4B2B2B4B2B2B4B2B2B4B2B2B4
              B2B2B4B2B2B4B2B2B2B2B2C1BAB8A56A6A7E2C2D823334FF00FF}
            Caption = '&Guardar'
            ParentFont = False
            Font.Height = -13
            Font.Name = 'Century Gothic'
            TabOrder = 1
            OnClick = btnGuardarPresupClick
          end
          object btnCancelarPresup: TUniBitBtn
            Left = 645
            Top = 11
            Width = 129
            Height = 33
            Glyph.Data = {
              76060000424D7606000000000000360400002800000018000000180000000100
              08000000000040020000220B0000220B00000001000000010000942900009C31
              00009C390000A5390000A5420000AD420000AD4A0000B54A0000B5520000BD52
              0000BD5A0000C65A0000C6630000CE630000CE6B0000D66B0000D67300009C39
              0800A5390800A5420800AD420800AD4A0800B5520800BD5A0800CE630800AD4A
              1000B5521000B55A1000BD5A1000C6631000DE7B1000BD5A1800BD631800C663
              1800CE731800D6731800DE7B1800DE841800C6632100C66B2100D67B2100DE84
              2100EF942100D6842900E78C2900EF942900DE8C3100EF943100F79C3100F7A5
              3100E7943900F7A53900FFA53900F7A54200FFAD4200FFB54200F7AD4A00FFAD
              4A00FFB54A00FFB55200FFBD5200FFC65200FF00FF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
              FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF003E3E3E3E3E3E
              3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E
              1313133E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E13080A13113E3E3E3E
              3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E120A0F0A13133E3E3E3E3E3E3E3E3E3E3E
              3E3E3E3E3E3E3E13130B0F0A13133E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E
              11130C0E0811113E3E3E131111111111111111111111133E3E11150D0E151111
              3E3E131B1B16151515151515071513133E3E11150E0C13113E3E192F2C1E0E0E
              0E0E0E0E0E0F16113E3E3E11160E0A11113E1935332C25180808080808161313
              3E3E3E3E110A0E15113E193839322F24131111111111133E3E3E3E3E11150E0A
              111119353B272E302313113E3E3E3E3E3E3E3E3E3E130D0C131119353C1F1935
              332212113E3E3E3E3E3E3E3E3E130C0C131119353C20002038332213113E3E3E
              3E3E3E3E3E130C0C131119353B2002022739332813113E3E3E3E3E3E11150E0C
              131119353B20023E022638362915113E3E3E3E13110A0E0A113E19353B20023E
              3E011F35362C1A1111111111080E0E14113E19353B20023E3E3E021932363022
              1B15150A0E0E16113E3E19383C20023E3E3E3E02112732302D1E100E0B15113E
              3E3E132B3219113E3E3E3E3E1102131B2120161313113E3E3E3E3E1111113E3E
              3E3E3E3E3E3E1111111111113E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E
              3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E
              3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E}
            Caption = '&Cancelar'
            ParentFont = False
            Font.Height = -13
            Font.Name = 'Century Gothic'
            TabOrder = 2
            OnClick = btnCancelarPresupClick
          end
        end
        object pnl1: TUniPanel
          Left = 1
          Top = 1
          Width = 1337
          Height = 40
          Align = alTop
          Anchors = [akLeft, akTop, akRight]
          Color = clBtnFace
          TabOrder = 3
          object lblMantenimientoPresupuesto: TUniLabel
            Left = 1
            Top = 1
            Width = 1335
            Height = 38
            Alignment = taCenter
            AutoSize = False
            Caption = 'Mantenimiento de Presupuestos de Proveedores'
            Align = alClient
            Anchors = [akLeft, akTop, akRight, akBottom]
            ParentFont = False
            Font.Charset = ANSI_CHARSET
            Font.Color = clNavy
            Font.Height = -20
            Font.Name = 'Century Gothic'
            Font.Style = [fsBold]
            ParentColor = False
            Color = clSkyBlue
            Transparent = False
            TabOrder = 1
          end
        end
      end
    end
  end
  object qryMantePresupG: TSQLQuery
    GetMetadata = True
    MaxBlobSize = -1
    Params = <>
    SQL.Strings = (
      'SELECT A.*'
      'FROM PRESUPUESTO_PROVEEDORES A '
      '')
    SQLConnection = UniMainModule.SQLConnection_Reg1
    Left = 48
    Top = 120
    object qryMantePresupGID_PRESUPUESTO: TIntegerField
      FieldName = 'ID_PRESUPUESTO'
    end
    object qryMantePresupGID_CAMPANHA: TIntegerField
      FieldName = 'ID_CAMPANHA'
    end
    object qryMantePresupGID_CATEGORIA: TIntegerField
      FieldName = 'ID_CATEGORIA'
    end
    object qryMantePresupGID_SERVICIO: TIntegerField
      FieldName = 'ID_SERVICIO'
    end
    object qryMantePresupGID_PROVEEDORES: TIntegerField
      FieldName = 'ID_PROVEEDORES'
    end
    object qryMantePresupGDESCRIPCION_PRESUP: TStringField
      FieldName = 'DESCRIPCION_PRESUP'
      Size = 250
    end
    object qryMantePresupGHABITACIONES_DISP: TIntegerField
      FieldName = 'HABITACIONES_DISP'
    end
    object qryMantePresupGFECHA_VENCIMIENTO: TDateField
      FieldName = 'FECHA_VENCIMIENTO'
    end
    object qryMantePresupGESTADO_REGISTRO: TStringField
      FieldName = 'ESTADO_REGISTRO'
      Size = 1
    end
    object qryMantePresupGCOSTO: TFloatField
      FieldName = 'COSTO'
    end
    object qryMantePresupGIVA: TFloatField
      FieldName = 'IVA'
    end
    object qryMantePresupGOPERADOR: TStringField
      FieldName = 'OPERADOR'
      Size = 10
    end
    object qryMantePresupGFECHA_CARGA: TDateField
      FieldName = 'FECHA_CARGA'
    end
    object qryMantePresupGFECHA_EMISION: TDateField
      FieldName = 'FECHA_EMISION'
    end
  end
  object dsMantePresupG: TDataSource
    DataSet = cdsMantePresupG
    Left = 48
    Top = 176
  end
  object provMantePresupG: TDataSetProvider
    DataSet = qryMantePresupG
    Left = 48
    Top = 232
  end
  object cdsMantePresupG: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'provMantePresupG'
    Left = 48
    Top = 288
    object cdsMantePresupGID_PRESUPUESTO: TIntegerField
      FieldName = 'ID_PRESUPUESTO'
    end
    object cdsMantePresupGID_CAMPANHA: TIntegerField
      FieldName = 'ID_CAMPANHA'
    end
    object cdsMantePresupGID_CATEGORIA: TIntegerField
      FieldName = 'ID_CATEGORIA'
    end
    object cdsMantePresupGID_SERVICIO: TIntegerField
      FieldName = 'ID_SERVICIO'
    end
    object cdsMantePresupGID_PROVEEDORES: TIntegerField
      FieldName = 'ID_PROVEEDORES'
    end
    object cdsMantePresupGDESCRIPCION_PRESUP: TStringField
      FieldName = 'DESCRIPCION_PRESUP'
      Size = 250
    end
    object cdsMantePresupGHABITACIONES_DISP: TIntegerField
      FieldName = 'HABITACIONES_DISP'
    end
    object cdsMantePresupGFECHA_VENCIMIENTO: TDateField
      FieldName = 'FECHA_VENCIMIENTO'
    end
    object cdsMantePresupGESTADO_REGISTRO: TStringField
      FieldName = 'ESTADO_REGISTRO'
      Size = 1
    end
    object cdsMantePresupGCOSTO: TFloatField
      FieldName = 'COSTO'
    end
    object cdsMantePresupGIVA: TFloatField
      FieldName = 'IVA'
    end
    object cdsMantePresupGOPERADOR: TStringField
      FieldName = 'OPERADOR'
      Size = 10
    end
    object cdsMantePresupGFECHA_CARGA: TDateField
      FieldName = 'FECHA_CARGA'
    end
    object cdsMantePresupGFECHA_EMISION: TDateField
      FieldName = 'FECHA_EMISION'
    end
  end
  object qryPresupuesto: TSQLQuery
    GetMetadata = True
    MaxBlobSize = -1
    Params = <>
    SQL.Strings = (
      
        'select A.id_presupuesto, A.id_campanha, A.id_categoria, A.id_ser' +
        'vicio, A.id_proveedores,'
      
        'A.descripcion_presup, A.habitaciones_disp, A.fecha_vencimiento, ' +
        'A.fecha_emision, A.costo, '
      
        'A.iva, A.estado_registro, B.nombre_campanha AS desc_campanha, C.' +
        'denominacion as desc_proveedores, '
      
        'D.nombre_categoria as desc_categoria, E.descripcion as desc_serv' +
        'icio'
      'from presupuesto_proveedores A'
      
        'inner join campanha B on A.id_campanha = B.id_campanha and B.est' +
        'ado_registro = '#39'A'#39
      
        'inner join proveedores C on A.id_proveedores = C.id_proveedor an' +
        'd B.estado_registro = '#39'A'#39
      
        'inner join categoria D on A.id_categoria = D.id_categoria and D.' +
        'estado_registro = '#39'A'#39
      
        'inner join servicio E ON A.id_servicio = E.id_servicio AND E.est' +
        'ado_registro = '#39'A'#39
      '')
    SQLConnection = UniMainModule.SQLConnection_Reg1
    Left = 168
    Top = 120
    object qryPresupuestoID_PRESUPUESTO: TIntegerField
      FieldName = 'ID_PRESUPUESTO'
      Required = True
    end
    object qryPresupuestoID_CAMPANHA: TIntegerField
      FieldName = 'ID_CAMPANHA'
      Required = True
    end
    object qryPresupuestoID_CATEGORIA: TIntegerField
      FieldName = 'ID_CATEGORIA'
      Required = True
    end
    object qryPresupuestoID_SERVICIO: TIntegerField
      FieldName = 'ID_SERVICIO'
      Required = True
    end
    object qryPresupuestoID_PROVEEDORES: TIntegerField
      FieldName = 'ID_PROVEEDORES'
      Required = True
    end
    object qryPresupuestoDESCRIPCION_PRESUP: TStringField
      FieldName = 'DESCRIPCION_PRESUP'
      Size = 250
    end
    object qryPresupuestoHABITACIONES_DISP: TIntegerField
      FieldName = 'HABITACIONES_DISP'
    end
    object qryPresupuestoFECHA_VENCIMIENTO: TDateField
      FieldName = 'FECHA_VENCIMIENTO'
    end
    object qryPresupuestoFECHA_EMISION: TDateField
      FieldName = 'FECHA_EMISION'
      Required = True
    end
    object qryPresupuestoCOSTO: TFloatField
      FieldName = 'COSTO'
    end
    object qryPresupuestoIVA: TFloatField
      FieldName = 'IVA'
    end
    object qryPresupuestoESTADO_REGISTRO: TStringField
      FieldName = 'ESTADO_REGISTRO'
      Required = True
      Size = 1
    end
    object qryPresupuestoDESC_CAMPANHA: TStringField
      FieldName = 'DESC_CAMPANHA'
      Required = True
      FixedChar = True
      Size = 100
    end
    object qryPresupuestoDESC_PROVEEDORES: TStringField
      FieldName = 'DESC_PROVEEDORES'
      Size = 40
    end
    object qryPresupuestoDESC_CATEGORIA: TStringField
      FieldName = 'DESC_CATEGORIA'
      FixedChar = True
      Size = 100
    end
    object qryPresupuestoDESC_SERVICIO: TStringField
      FieldName = 'DESC_SERVICIO'
      Size = 255
    end
  end
  object dsPresupuesto: TDataSource
    DataSet = cdsPresupuesto
    Left = 168
    Top = 176
  end
  object provPresupuesto: TDataSetProvider
    DataSet = qryPresupuesto
    Left = 168
    Top = 232
  end
  object cdsPresupuesto: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'provPresupuesto'
    Left = 168
    Top = 288
    object cdsPresupuestoID_PRESUPUESTO: TIntegerField
      FieldName = 'ID_PRESUPUESTO'
      Required = True
    end
    object cdsPresupuestoID_CAMPANHA: TIntegerField
      FieldName = 'ID_CAMPANHA'
      Required = True
    end
    object cdsPresupuestoID_CATEGORIA: TIntegerField
      FieldName = 'ID_CATEGORIA'
      Required = True
    end
    object cdsPresupuestoID_SERVICIO: TIntegerField
      FieldName = 'ID_SERVICIO'
      Required = True
    end
    object cdsPresupuestoID_PROVEEDORES: TIntegerField
      FieldName = 'ID_PROVEEDORES'
      Required = True
    end
    object cdsPresupuestoDESCRIPCION_PRESUP: TStringField
      FieldName = 'DESCRIPCION_PRESUP'
      Size = 250
    end
    object cdsPresupuestoHABITACIONES_DISP: TIntegerField
      FieldName = 'HABITACIONES_DISP'
    end
    object cdsPresupuestoFECHA_VENCIMIENTO: TDateField
      FieldName = 'FECHA_VENCIMIENTO'
    end
    object cdsPresupuestoFECHA_EMISION: TDateField
      FieldName = 'FECHA_EMISION'
      Required = True
    end
    object cdsPresupuestoCOSTO: TFloatField
      FieldName = 'COSTO'
    end
    object cdsPresupuestoIVA: TFloatField
      FieldName = 'IVA'
    end
    object cdsPresupuestoESTADO_REGISTRO: TStringField
      FieldName = 'ESTADO_REGISTRO'
      Required = True
      Size = 1
    end
    object cdsPresupuestoDESC_CAMPANHA: TStringField
      FieldName = 'DESC_CAMPANHA'
      Required = True
      FixedChar = True
      Size = 100
    end
    object cdsPresupuestoDESC_PROVEEDORES: TStringField
      FieldName = 'DESC_PROVEEDORES'
      Size = 40
    end
    object cdsPresupuestoDESC_CATEGORIA: TStringField
      FieldName = 'DESC_CATEGORIA'
      FixedChar = True
      Size = 100
    end
    object cdsPresupuestoDESC_SERVICIO: TStringField
      FieldName = 'DESC_SERVICIO'
      Size = 255
    end
  end
end
